home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1995 April / Internet Tools.iso / infoserv / gopher / Unix / emacs-client / forms / forms-passwd < prev    next >
Encoding:
Text File  |  1993-10-21  |  815 b   |  34 lines
  1. ;; forms-passwd -- demo for forms-mode    -*-emacs-lisp-*-
  2. ;; SCCS Status     : @(#)@ forms-passwd    1.1.2
  3. ;; Author          : Johan Vromans
  4. ;; Created On      : 1989
  5. ;; Last Modified By: Johan Vromans
  6. ;; Last Modified On: Tue Jul  2 15:12:45 1991
  7. ;; Update Count    : 2
  8. ;; Status          : OK
  9. ;; 
  10. ;;
  11. ;; This demo visits your passwd file.
  12.  
  13. ;; use yp if present
  14. (or (file-exists-p (setq forms-file "/var/yp/src/passwd"))
  15.     (setq forms-file "/etc/passwd"))
  16.  
  17. (setq forms-read-only t)        ; to make sure
  18. (setq forms-field-sep ":")
  19. (setq forms-number-of-fields 7)
  20.  
  21. (setq forms-format-list
  22.       (list
  23.        "====== Visiting " forms-file " ======\n\n"
  24.        "User : "    1
  25.        "   Uid: "    3
  26.        "   Gid: "    4
  27.        "\n\n"
  28.        "Name : "    5
  29.        "\n\n"
  30.        "Home : "    6
  31.        "\n\n"
  32.        "Shell: "    7
  33.        "\n"))
  34.